Form4
Form4
Form_Click
Form_KeyDown
KeyCode
Shift
OnKey
Form_KeyDown
  Call OnKey(KeyCode, Shift)